procedure MakePendingFileRenameOperationsChecksum: String;
Calculates a checksum of the current PendingFileRenameOperations registry value (on NT 4+ platforms) or of the current WININIT.INI file (on non-NT platforms). The caller can use this checksum to determine if PendingFileRenameOperations or WININIT.INI was changed (perhaps by another program).
var ChecksumBefore, ChecksumAfter: String; begin ChecksumBefore := MakePendingFileRenameOperationsChecksum; // ...run a program... ChecksumAfter := MakePendingFileRenameOperationsChecksum; if ChecksumAfter <> ChecksumBefore then // PendingFileRenameOperations or WININIT.INI changed end;